home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / wb / czesc_4 / vark15 / utils p-z / virtualfloppy.lha / virtualfloppy / install-script < prev    next >
Text File  |  1996-05-01  |  2KB  |  108 lines
  1. (set @my-dest "SYS:Tools/")
  2.  
  3. (if (<> "deutsch" @language)
  4. (
  5. (set #begin (cat "\nVirtualFloppy is ©1996 by Holger Kasten.\n\n")
  6. )
  7. (set #Pfad  (cat "Select the target directory for VirtualFloppy."))
  8. (set #Hilfe-Pfad (cat "\nThis section lets you choose the target directory to install VirtualFloppy in.\n\n"
  9.                       "Default is SYS:Tools/\n\n"
  10.                       @askdir-help))
  11. (set #ende (cat "\nHave fun with VirtualFloppy."))
  12. (set #mount (cat "Diskformat"))
  13. )
  14. (
  15. (set #begin (cat "\nVirtualFloppy ist ©1996 von Holger Kasten.\n\n"))
  16. (set #Pfad  (cat "Wählen Sie bitte das Zielverzeichnis für VirtualFloppy\n"))
  17. (set #Hilfe-Pfad (cat "\nHier können Sie das Zielverzeichnis für VirtualFloppy angeben.\n\n"
  18.                      "    Default ist SYS:Tools/\n\n"
  19.                      @askdir-help))
  20. (set #ende (cat "\nViel Spaß mit VirtualFloppy."))
  21. (set #mount (cat "Was für Disketten möchten Sie simulieren?"))
  22. ))
  23.  
  24.  
  25. (message #begin)
  26. (complete 0)
  27.  
  28. (set target (askdir (prompt (cat #Pfad))
  29.                     (help   (cat #Hilfe-Pfad))
  30.                     (default @my-dest)
  31.             )
  32. )
  33.  
  34. (set @my-dest target)
  35. (makedir (tackon @my-dest "VirtualFloppy") (infos))
  36. (set @my-dest (tackon @my-dest "VirtualFloppy"))
  37.  
  38. (complete 20)
  39.  
  40. (copyfiles (source "VirtualFloppy")
  41.            (dest (tackon @my-dest "")) (infos)
  42. )
  43.  
  44.  
  45. (complete 40)
  46.  
  47. (copylib
  48.             (source "devs/fmsdisk.device")
  49.             (dest "devs:")
  50. )
  51.  
  52. (copylib
  53.             (source "libs/reqtools.library")
  54.             (dest "libs:")
  55. )
  56.  
  57. (complete 60)
  58.  
  59. (makedir (tackon "devs:" "VFX-DISKS"))
  60.  
  61. (set vi_mount (askchoice
  62.     (help "")
  63.     (prompt #mount)
  64.     (choices
  65.         "30 Amiga (880 KB) Disks"
  66.         "30 PC (720 KB) Disks"
  67.         "15 Amiga (880 KB) Disks & 15 PC (720 KB) Disks")
  68. ))
  69.  
  70.  
  71. (IF (= 0 vi_mount)
  72.   (copyfiles
  73.                        (source "devs/Amiga/VFX-mountlist")
  74.                        (dest (tackon "devs:" ""))
  75.   )
  76. )
  77.  
  78. (IF (= 1 vi_mount)
  79.   (copyfiles
  80.                        (source "devs/PC/VFX-mountlist")
  81.                        (dest (tackon "devs:" ""))
  82.   )
  83. )
  84.  
  85. (IF (= 2 vi_mount)
  86.   (copyfiles
  87.                        (source "devs/Amiga&PC/VFX-mountlist")
  88.                        (dest (tackon "devs:" ""))
  89.   )
  90. )
  91.  
  92.  
  93.  
  94. (complete 80)
  95.  
  96. (copyfiles
  97.                      (source "RegiTool")
  98.                      (dest (tackon @my-dest "") (infos))
  99. )
  100.  
  101. (copyfiles
  102.                      (source "Anleitung")
  103.                      (dest (tackon @my-dest "") (infos))
  104. )
  105.  
  106. (message #ende)
  107. (complete 100)
  108.